home *** CD-ROM | disk | FTP | other *** search
/ Hip Tissue / Hip Tissue - Disc 1.iso / pc / dir / volume.dxr / 00013.ls < prev    next >
Encoding:
Text File  |  1997-11-06  |  402 b   |  13 lines

  1. on mouseDown
  2.   set zure to the mouseH - the locH of sprite clickOn()
  3.   repeat while the stillDown
  4.     set the locH of sprite clickOn() to constrainH(10, the mouseH - zure)
  5.     set the movieTime of sprite 13 to integer(float((the locH of sprite clickOn() - the left of sprite 10) * 1430 / the width of sprite 10))
  6.     updateStage()
  7.   end repeat
  8. end
  9.  
  10. on mouseUp
  11.   set the movieRate of sprite 13 to 1
  12. end
  13.